procedure TForm1.Button1Click(Sender: TObject);
begin
  Application.HintHidePause := 60000; //60 Sec
end;
